home *** CD-ROM | disk | FTP | other *** search
/ Deutsche Edition 1 / Deutsche Edition 1.iso / amok / 081-090 / amok84 / envsupport / envsupport.dok next >
Text File  |  1993-11-04  |  2KB  |  68 lines

  1.  
  2.                                       /
  3.                           EnvSupport /
  4.                       ______________/
  5.  
  6.  
  7. Dieses  Modul  vereinfacht  die  Handhabung  von Environmentvariablen in einem
  8. OberonProgramm.
  9.  
  10. Es stehen folgende Prozeduren zur Verfügung:
  11.  
  12.    PROCEDURE Local (local: BOOLEAN);
  13.    PROCEDURE SetFlags (newFlags: LONGSET);
  14.  
  15.    PROCEDURE SetEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
  16.    PROCEDURE GetEnv (Name: ARRAY OF CHAR; VAR Buff: ARRAY OF CHAR): BOOLEAN;
  17.  
  18.    PROCEDURE AddEnv    (Name, String: ARRAY OF CHAR): BOOLEAN;
  19.    PROCEDURE CutEnv    (Name, String: ARRAY OF CHAR): BOOLEAN;
  20.    PROCEDURE TestEnv   (Name, String: ARRAY OF CHAR): BOOLEAN;
  21.    PROCEDURE ToggleEnv (Name, String: ARRAY OF CHAR): BOOLEAN;
  22.  
  23.  
  24. Jetzt folgt die Beschreibung der einzelnen Prozeduren:
  25.  
  26.    PROCEDURE Local(local: BOOLEAN);
  27.  
  28.    -- Sollen die Variablen lokal (nur für dein Programm) oder global sein?
  29.  
  30.  
  31.    PROCEDURE SetFlags(newFlags: LONGSET);
  32.  
  33.    -- Falls jemand noch andere flags (binaryVar) setzen will.
  34.  
  35.  
  36.    PROCEDURE SetEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
  37.  
  38.    -- Die EnvVar 'Name' mit 'String' belegen.
  39.  
  40.  
  41.    PROCEDURE GetEnv(Name: ARRAY OF CHAR; VAR Buff: ARRAY OF CHAR): BOOLEAN;
  42.  
  43.    -- Den Wert der EnvVar 'Name' holen.
  44.  
  45.  
  46.    PROCEDURE AddEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
  47.  
  48.    -- 'String' an den Inhalt der EnvVar 'Name' anhängen.
  49.  
  50.  
  51.    PROCEDURE CutEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
  52.  
  53.    -- 'String' aus der EnvVar 'Name' löschen.
  54.  
  55.  
  56.    PROCEDURE TestEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
  57.  
  58.    -- Testen, ob 'String' in 'Name' vorkommt.
  59.  
  60.  
  61.    PROCEDURE ToggleEnv(Name, String: ARRAY OF CHAR): BOOLEAN;
  62.  
  63.    -- Wenn 'String' in 'Name' vorkommt, 'String' aus 'Name' löschen,
  64.       sonst 'String' anhängen.
  65.  
  66. So, das wars! Viel Spaß damit!
  67.  
  68.